﻿<!--#include file="../inc/common.asp" -->
<%
    response.AddHeader "Last-Modified", DateToGMT(Now())
    response.Expires = 0
    response.CacheControl = "no-cache"
  
    if not userObj.isAdmin then
        response.write "您没有权限"
        call closeDB()
        response.end
    end if    
%>
<HTML><HEAD><TITLE><%=hostTitle%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=<%=DEFAULT_CHARSET%>">
<style type="text/css">
li {
	line-height: 200%;
	}
</style>	
</HEAD>
<BODY>

<%

    
 function printCache()
    dim values, j
    for each j in Application.Contents 
      if left(j,len(GLOBAL_CACHE_PREFIX))=GLOBAL_CACHE_PREFIX then
        values =  Application.Contents(j)
        response.write  "<p>" & j & " = "&  array2String(values) & "</p>"
      end if  
    next
 end function    
 response.write GLOBAL_CACHE_PREFIX
 call printCache() 

%>



</BODY>
</HTML>

<!--#include file="../inc/end.asp" -->
